object frmPeriodicLibrary: TfrmPeriodicLibrary
  Left = 269
  Top = 113
  HelpContext = 1
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  AutoScroll = False
  Caption = 'BK Periodic Library v1.61'
  ClientHeight = 339
  ClientWidth = 538
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Menu = MainMenu
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object pntBackGround: TPaintBox
    Left = 0
    Top = 36
    Width = 538
    Height = 280
    Align = alClient
    OnMouseMove = ClearStatus
    OnPaint = BackgroundPaint
  end
  object imgWallpaper: TImage
    Left = 420
    Top = 134
    Width = 110
    Height = 106
    Visible = False
  end
  object PeriodicTable: TPanel
    Left = 21
    Top = 61
    Width = 450
    Height = 214
    BevelInner = bvLowered
    BorderWidth = 1
    BorderStyle = bsSingle
    Ctl3D = False
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = True
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 2
    Visible = False
    OnMouseDown = TableMouseDown
    OnMouseMove = ClearStatus
    OnResize = PeriodicTableResize
    object pntGroupLines: TPaintBox
      Left = 281
      Top = 83
      Width = 157
      Height = 57
      OnMouseDown = TableMouseDown
      OnMouseMove = ClearStatus
      OnPaint = LinesPaint
    end
    object pntElementLines: TPaintBox
      Left = 195
      Top = 145
      Width = 157
      Height = 57
      Color = clBtnFace
      ParentColor = False
      OnMouseDown = TableMouseDown
      OnMouseMove = ClearStatus
      OnPaint = LinesPaint
    end
    object panLegend: TPanel
      Left = 16
      Top = 10
      Width = 138
      Height = 70
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Ctl3D = True
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 0
      OnDblClick = LegendDblClick
      OnMouseDown = TableMouseDown
      OnMouseMove = Status
      object lblMetals: TLabel
        Left = 3
        Top = 2
        Width = 40
        Height = 16
        AutoSize = False
        Caption = 'Metals'
        Font.Color = clRed
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnDblClick = LegendDblClick
        OnMouseDown = TableMouseDown
        OnMouseMove = Status
      end
      object lblNonMetals: TLabel
        Left = 3
        Top = 18
        Width = 65
        Height = 16
        AutoSize = False
        Caption = 'Nonmetals'
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnDblClick = LegendDblClick
        OnMouseDown = TableMouseDown
        OnMouseMove = Status
      end
      object lblSemimetals: TLabel
        Left = 3
        Top = 34
        Width = 71
        Height = 16
        AutoSize = False
        Caption = 'Semimetals'
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnDblClick = LegendDblClick
        OnMouseDown = TableMouseDown
        OnMouseMove = Status
      end
      object lblGases: TLabel
        Left = 89
        Top = 34
        Width = 40
        Height = 16
        AutoSize = False
        Caption = 'Gases'
        Font.Color = clYellow
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnDblClick = LegendDblClick
        OnMouseDown = TableMouseDown
        OnMouseMove = Status
      end
      object lblLiquids: TLabel
        Left = 89
        Top = 18
        Width = 43
        Height = 16
        AutoSize = False
        Caption = 'Liquids'
        Font.Color = clGreen
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnDblClick = LegendDblClick
        OnMouseDown = TableMouseDown
        OnMouseMove = Status
      end
      object lblSolids: TLabel
        Left = 89
        Top = 2
        Width = 38
        Height = 16
        AutoSize = False
        Caption = 'Solids'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnDblClick = LegendDblClick
        OnMouseDown = TableMouseDown
        OnMouseMove = Status
      end
      object lblUndefined: TLabel
        Left = 3
        Top = 49
        Width = 62
        Height = 16
        AutoSize = False
        Caption = 'Undefined'
        Font.Color = clGray
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnDblClick = LegendDblClick
        OnMouseDown = TableMouseDown
        OnMouseMove = Status
      end
    end
  end
  object ToolBar: TPanel
    Left = 0
    Top = 0
    Width = 538
    Height = 36
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    OnMouseMove = ClearStatus
    OnResize = ToolsResize
    object ToolBarBevel: TBevel
      Left = 0
      Top = 0
      Width = 538
      Height = 3
      Align = alTop
      Shape = bsTopLine
    end
    object butElementInfo: TSpeedButton
      Left = 41
      Top = 4
      Width = 28
      Height = 28
      Hint = 'Element Info'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000CE0E0000D80E00000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        777777777777777777777777777777777777777777FFFF7777777777772222F7
        7777777777722F777777777777722F777777777777722F777777777777F22F77
        7777777777222777777777777777FF777777777777722F777777777777722777
        7777777777777777777777777777777777777777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = MenuClick
      OnMouseMove = Status
    end
    object butHelp: TSpeedButton
      Left = 163
      Top = 4
      Width = 28
      Height = 28
      Hint = 'Help'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000CE0E0000D80E00000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777777777FF777777777777733F777
        777777777733777777777777777FF777777777777733F777777777777733F777
        7777777777733F77777777777F7733F77777777733FF33F77777777773333F77
        7777777777777777777777777777777777777777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = MenuClick
      OnMouseMove = Status
    end
    object butAbout: TSpeedButton
      Left = 191
      Top = 4
      Width = 28
      Height = 28
      Hint = 'About'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000CE0E0000D80E00000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777FFFFFF7777777770000000F70F7
        77700F777770F0F7770F0F777770F0F770F70F7777F0F0F70F770F7FFF00F0F0
        F7770F700077700F77770F770F7770F0F7770FFF077770F70F770000777770F7
        70F7777777777777777777777777777777777777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = MenuClick
      OnMouseMove = Status
    end
    object butColor: TSpeedButton
      Left = 8
      Top = 4
      Width = 28
      Height = 28
      Hint = 'Setup Colors'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        77777117227447997CC77117227447997CC77117227447997CC7711722744799
        7CC77117227447997CC77117227447997CC77117227447997CC7711722744799
        7CC77117227447997CC77117227447997CC77117227447997CC7711722744799
        7CC77117227447997CC77117227447997CC77777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = MenuClick
      OnMouseMove = Status
    end
    object butFind: TSpeedButton
      Left = 69
      Top = 4
      Width = 28
      Height = 28
      Hint = 'Find Element'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000084120000841200000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        1711777777777771711177777777771711177777777771711177777700001711
        17777700777F8111777770877777F8087777707777777F077777077777777770
        7777077777777770777707F777777770777707F777777770777770FF77777707
        7777708FFF777807777777007777007777777777000077777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = MenuClick
      OnMouseMove = Status
    end
    object butTemperature: TSpeedButton
      Left = 97
      Top = 4
      Width = 28
      Height = 28
      Hint = 'Set Temperature'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000084120000841200000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777000777
        7777777770888077777777770888880777777777088888077777777708888807
        7777777770888077777777777708077777777777770807777777777777060777
        77777777770807777777777777080777777777777706077777777777770F0777
        77777777770F0777777777777706077777777777770F07777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = MenuClick
      OnMouseMove = Status
    end
    object butGraph: TSpeedButton
      Left = 130
      Top = 4
      Width = 28
      Height = 28
      Hint = 'Graph Trends'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777770000007
        7777777777700777777777777770077777777777770000777777777777700777
        7777077777700777777007707770077707700000000000000000000000000000
        0000077077700777077007777770077777707777777007777777777777000077
        7777777777700777777777777770077777777777700000077777}
      ParentShowHint = False
      ShowHint = True
      OnClick = MenuClick
      OnMouseMove = Status
    end
    object TempSlider: TScrollBar
      Left = 228
      Top = 7
      Width = 303
      Height = 20
      Hint = 'Temperature Slider'
      Ctl3D = True
      LargeChange = 100
      Max = 6000
      ParentCtl3D = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TabStop = False
      OnChange = UpdateTempStatus
    end
  end
  object StatusBar: TStatusBar
    Left = 0
    Top = 316
    Width = 538
    Height = 23
    Panels = <
      item
        Width = 50
      end
      item
        Width = 50
      end>
    SimplePanel = False
    OnResize = ToolsResize
  end
  object MainMenu: TMainMenu
    Left = 480
    Top = 52
    object FileMenu: TMenuItem
      Caption = '&File'
      ShortCut = 0
      OnClick = MenuClick
      object mnuSaveConfigNow: TMenuItem
        Caption = '&Save Config &Now'
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuSaveConfigOnExit: TMenuItem
        Caption = 'Save Config On &Exit'
        Checked = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuExit: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = MenuClick
      end
    end
    object ViewMenu: TMenuItem
      Caption = '&View'
      ShortCut = 0
      object mnuToolbar: TMenuItem
        Caption = '&Toolbar'
        Checked = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuStatusBar: TMenuItem
        Caption = 'Status &Bar'
        Checked = True
        ShortCut = 0
        OnClick = MenuClick
      end
      object N8: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuElementOnTop: TMenuItem
        Caption = '&Element Info On Top'
        ShortCut = 0
        OnClick = MenuClick
      end
      object mnuTrendsOnTop: TMenuItem
        Caption = '&Trends Graph On Top'
        ShortCut = 0
        OnClick = MenuClick
      end
      object N7: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuOptions: TMenuItem
        Caption = '&Options...'
        ShortCut = 0
        OnClick = MenuClick
      end
    end
    object ElementMenu: TMenuItem
      Caption = '&Element'
      ShortCut = 0
      object mnuFindElement: TMenuItem
        Caption = '&Find Element...'
        ShortCut = 16454
        OnClick = MenuClick
      end
      object mnuSetTemperature: TMenuItem
        Caption = 'Set &Temperature...'
        ShortCut = 16468
        OnClick = MenuClick
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuElementInfo: TMenuItem
        Caption = 'Element &Information'
        ShortCut = 16457
        OnClick = MenuClick
      end
    end
    object TrendsMenu: TMenuItem
      Caption = '&Trends'
      ShortCut = 0
      object mnuNone: TMenuItem
        Caption = '&None'
        Checked = True
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuAtomicRadius: TMenuItem
        Caption = 'Atomic &Radius'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuAtomicVolume: TMenuItem
        Caption = 'Atomic &Volume'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuAtomicWeight: TMenuItem
        Caption = 'Atomic &Weight'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuBoilingPoint: TMenuItem
        Caption = '&Boiling Point'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuCovalentRadius: TMenuItem
        Caption = '&Covalent Radius'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuDensity: TMenuItem
        Caption = '&Density'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuElectroConduct: TMenuItem
        Caption = '&Electrical Conductivity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuElectroneg: TMenuItem
        Caption = 'Electro&negativity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuFirstIonPoten: TMenuItem
        Caption = '&First Ionization Potential'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuHeatFusion: TMenuItem
        Caption = '&Heat of Fusion'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuHeatVapor: TMenuItem
        Caption = 'Heat of &Vaporization'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuMeltingPoint: TMenuItem
        Caption = '&Melting Point'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuSpecificHeat: TMenuItem
        Caption = '&Specific Heat'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object mnuThermalConduct: TMenuItem
        Caption = '&Thermal Conductivity'
        RadioItem = True
        ShortCut = 0
        OnClick = MenuTrendsClick
      end
      object N4: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object mnuGraph: TMenuItem
        Caption = '&Graph Trends'
        ShortCut = 0
        OnClick = MenuClick
      end
    end
    object HelpMenu: TMenuItem
      Caption = '&Help'
      ShortCut = 0
      object mnuHelpContents: TMenuItem
        Caption = 'Help &Contents'
        ShortCut = 112
        OnClick = MenuClick
      end
      object mnuAbout: TMenuItem
        Caption = '&About BK Periodic Library...'
        ShortCut = 0
        OnClick = MenuClick
      end
    end
  end
  object PopupMenu: TPopupMenu
    Left = 488
    Top = 92
    object mnuElementInfoPop: TMenuItem
      Caption = '&Element Information'
      ShortCut = 0
      OnClick = MenuClick
    end
    object N6: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object mnuFindPop: TMenuItem
      Caption = '&Find Element...'
      ShortCut = 0
      OnClick = MenuClick
    end
    object mnuTempPop: TMenuItem
      Caption = 'Change &Temperature...'
      ShortCut = 0
      OnClick = MenuClick
    end
    object mnuColorPop: TMenuItem
      Caption = 'Setup &Colours...'
      ShortCut = 0
      OnClick = MenuClick
    end
  end
end